################################
#	John Henderson
#	Gerrymandering Incumbency 
#		(with Brian Hamel and Aaron Goldzimer)
#		January 1, 2018
#
################################
# Vote data come from Downs' Revenge book project::
# do not run                    

load('~/Desktop/Research/DownsRevenge/CAPAnalysis/kanterData/kanterLink.Rdata')
voteData=hd_data[which(hd_data[,"YearElec"]>2010),c("DemPercentage","RepPercentage","dist_ideal","StPOAbrv","RPresShr","DPresShr","YearElec")]
save(voteData,file='~/Dropbox/StateRedistricting/replication/short/voteData.Rdata')
#end